home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Buzz 6
/
Buzz 6.adf
/
Install
< prev
next >
Wrap
Text File
|
1995-03-26
|
2KB
|
105 lines
; $VER: BuZz-Install-Script v1.0 (95-03-26)
; Copyright © 1995 by dEFOANCe & The BUZZ Team
(complete 0)
(set OK 0)
(message "\n\n\n\n\nWelcome to the BuZz Installation\n\n\n"
"Copyright © 1995 by dEFIANCe & The BUZZ Team")
(complete 10)
(set DestPath
(askdir
(prompt "Where should I install BuZz?")
(help "\n BuZz will be installed in the choosen path,\n"
" creating the directory 'BuZz'.")
(default "SYS:")
)
)
(if
(askbool
(prompt "\n\nAre you sure, that BuZz should be\n"
"installed in\n\n\n'"
DestPath
"'\n\n\n(A new directory called 'BuZz' will be created,\n"
"where you will find the main executable\n"
"and all the necessary data files.)'")
(help "\n If you don't want to install BuZz in the\n"
" choosen directory, select the NO Gadget.\n\n"
" If you think that the selected directory is\n"
" up to your tastes, then press YES.")
)
(set OK 1)
)
(if (= OK 1)
(
(complete 10)
(set FinalPath (cat (tackon DestPath "BuZz")))
(set DataPath (cat (tackon FinalPath "Articles")))
(makedir
(FinalPath)
(infos)
)
(makedir
(DataPath)
(infos)
)
(askdisk
(prompt "\n\n\n\nPlease insert the first BuZz disk\n\n"
"'BuZz_6'\n\n"
"in any drive")
(help "\n Only one thing:\n"
" INSERT THE RIGHT DISK")
(dest "BuZz_6")
)
(complete 20)
(copyfiles
(source "BuZz_6:")
(dest FinalPath)
(pattern "(BuZz6)")
(optional "force")
)
(complete 30)
(copyfiles
(source "BuZz_6:")
(dest FinalPath)
(pattern "(BuZz6.info)")
(optional "force")
)
(complete 40)
(copyfiles
(prompt "Installing BuZz Data Files...")
(source "BuZz_6:Articles/")
(dest DataPath)
(all)
(optional "force")
)
)
)
(complete 100)
(set default-dest DestPath)
(message "\n\nInstallation complete!\n\n"
"Now make sure to change the Assign To BuZz6:\n"
"'Assign BuZz_6: xx:BuZz'\n")
(exit)